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SEQ 0001 



.REM, 



IDENTIFICATION 



PRODUCT CODE: 



AC-E920R-MC 



PRODUCT NAMES 



CXKWEBO KWV11K MODULE 



PRODUCT date: 



SEPTEMBER 1978 



maintainers 



DEC/X11 SUPPORT GROUP 



THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE 
WITHOUT NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT 
BY DIGITAL EQUIPMENT CORPORATION. DIGITAL EQUIPMENT 
CORPORATION ASSUMES NO RESPONSIBILITY FOR ANY ERRORS THAT 
MAY APPEAR IN THIS MANUAL * 

THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO THE 
PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER 
SYSTEM AND CAN BE COPIED (WITH INCLUSION OF DIGITALS 
COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY 
OTHERWISE BE PROVIDED IN WRITING BY DIGITAL* 

DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FGR 
THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS 
NOT SUPPLIED BY DIGITAL. 

COPYRIGHT (C) 1976, 197B DIGITAL EQUIPMENT CORPORATION 
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1*0 ABSTRACT 



THE KWE IS AH IOMOD THAT EXERCISES THE KWV11K REAL TINE 
CLOCK * ON START IT EXERCISES THE CSRS AND PRESET BUFFERS OF THE 
CLOCK, THEM AND FOR ALL RESTARTS, IT EXERCISES THE CLOCK 
AT EACH ONE OF ITS BASIC RATES* 



2.0 REQUIREMENTS 



HARDWARE: ONE KWV11 



STORAGE: : KWE REQUIRES I 

1* DECIMAL WORDS I 502 
2* OCTAL WORDS I 0766 
3* OCTAL BYTES: 1754 



3*0 PASS DEFINITION 



ONE PASS OF THE K&E MODULE CONSISTS OF GENERATING INTERRUPTS FOR 
ONE SECOND AT EACH CLOCK RATE, UNTIL 60 SECONDS HAVE ELAPSED* 



4*0 EXECUTION TIME 



OWE PASS OF THE KWE MODULE RUNNING ALONE TAKES APPROXIMATELY ONE 
MINUTE. 



5.0 CONFIGURATION REQUIREMENTS 
DEFAULT PARAMETERS: 

DEVADR: 170420, VECTOR 440, BR1: 4 
DEVCNT: 1, SRI: 

REQUIRED PARAMETERS : 

NONE 
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SEQ 0003 
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6»0 DEVICE/OUTPUT SET-UP % 
NOSE 

7.0 MODULE OPERATION 
TEST SEQUENCE: 

1. (START) BIT EXERCISE CSR^PRESET REGISTER OF CLOCK. 

2* (RESTRT) COUNT TESTS USING INTERRUPTS COUNT INTERRUPTS WILL 
OCCUR IN ONE SECOND AND ADVANCE THE TEST TO THE NEXT RATE. 

AFTER A RATE HIS BEEN SELECTED* A CHECK IS MADE TO SEE IF THE 
OPERATOR HAS INHIBITED THAT RATE FROM TEST. IF NOT* CONTROL 
IS TRANSFERRED TO THE PARTICULAR RATE ROUTINE (LISTED BELOW). 
EACH RATE ROUTINE MUST PRELOAD THE BUFFER REGISTER OF THE 
CLOCK TO THE COUNT THAT HILL CAUSE IT TO INTERRUPT IN ONE 
SECOND. AFTER THE BUFFER IS LOADED* THE CSR IS LOADED WITH 
THE PROPER BITS THAT SELECT THE RATE* 

A. COUNT TEST CLOCK A RATE 1MHZ. 



B. CLOCK A RATE: 10 OK HZ 

C. CLOCK A RATES 10KHZ 
D* CLOCK A RATE: 1KHZ 
E. CLOCK A RATE: 100HZ 

F » CLOCK A RATE: LINE FREQ. 

G. CLOCK A RATE: PSEUDO RANDOM (1 OF 3 RATES) 



i 
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VALID SRI VALUES 

SRI BIT SUABLE/DISABLE FUNCTION 

ENABLE TESTING 1MHZ 
I DISABLE TESTING 1MHZ 

1 ENABLE TESTING 100KHZ 
1 DISABLE TESTING 100KHZ 

2 ENABLE TESTING 10KHZ 

1 DISABLE TESTING 10KHZ 

3 ENABLE TESTING 1KHZ 

1 DISABLE TESTING 1KHZ 

4 ENABLE TESTING 100HZ 
1 DISABLE TESTING 100HZ 

5 *£N ABLE TESTING RANDOM 
1 DISABLE TESTING RANDOM 

6 ENABLE TESTING LINE FREQ 

1 DISABLE TESTING LINE FREQ 

♦NOTE: IF RANDOM RATE SELECTED, THEN AN SRI BIT DISABLING A 
PARTICULAR RATE WILL BE IGNORED * 



9,0 NON-STANDARD PRINTOUTS*. 



ALL PRINTOUTS HAVE THE STANDARD FORMATS DESCRIBED IN THE DEC/X11 
DOCUMENT • 
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<K WEB >, 170420, 440, 6/6,, 60., 122 
140000, KWEB / 170420 / 440,6,6,,60.,122 
KWEB DEC/X11 SYSTEM EXERCISER MODULE 
VERSION 6 23-MAY-78 
BIN 



IOMOD 
MODULE 
.TITLE 
DDXCOM 
.LIST 

********************* 



/KWEB / 
OPEN 




*********** 



********** 



r****************** 



(MODULE NAME. 

;USED TO KEEP TRACK OF WBUFF USAGE 
;1ST DEVICE ADDR. 
;1ST DEVICE VECTOR. 
;1ST BR LEVEL. 
;2ND BR LEVEL. 
;DEVICE INDICATOR 1. 
;SkITCH REGISTER 1 
'SWITCH REGISTER 2 
SWITCH REGISTER 3 
.(SWITCH REGISTER 4 
*********************************************** 

(STATUS WORD. 
MODULE START ADDR. 
MODULE STACK POINTER. 
~ ASS COUNTER. 

_ OF ITERATIONS PER PASS=60. 
(LOC TO COUNT ITERATIONS 
,OC TO SAVE TOTAL SOFT ERRORS 
,OC TO SAVE TOTAL HARD ERRORS 
LOC TO SAVE SOFT ERRORS PER PASS 
:LOC TO SAVE HARD ERRORS PER PASS 
'I OF SYS ERRORS ACCUMULATED 
ICLDS RANDOM ft WHEN RAND MACRO IS CALLED 
RESERVED FOR MONITOR USE 
[RESERVED FOR MONITOR USE 
(RESERVED FOR MONITOR USE 
LOC TO SAVE RO. 
(LOC TO SAVE Rl. 
LOC TO SAVE R2. 
iLOC TO SAVE R3. 
(LOC TO SAVE R4. 
(LOC TO SAVE R5. 
(LOC TO SAVE R6. 
ADDR OF CURRENT CSR. 
ADDR OF GOOD DATA/ OR 
CONTENTS OF CSR . 
ADDR OF BAD DATA, OR 
(STATUS REG CONTENTS. 
(TYPE OF ERROR 
EXPECTED DATA. 
ACTUAL DATA. 

(RESTART ADDRESS AFTER END OF PASS 
(WORDS TO MEMORY PER ITERATION 
WORDS FROM MEMORY PER ITERATION 
1 OF INTERRUPTS PER ITERATION 
I0DULE IDENTIFICATION NUMBER=122 
(MODULE STACK STARTS HERE. 
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236 000224" 
237 
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.WORD 

.LIST 

.ENDR 

MODSP: 

********************* 



*************** 



********************** 
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m 

240 



245 

k 



000224* 
000226' 

000230* 
000232* 

000234* 
000236* 



mm 
mm 

000444 
000446 



ASR: 

abr: 
avect: 

AVECT2 : 

bvect: 

BVECT2: 



; MODULE REQUIRED REGISTERS - SET UP BY THIS MODULE. 



. WORD 

.WORD 



.WORD 
.WORD 



.WORD 
.WORD 



mm 

440 
442 



KLOCK A STATUS REG. 

;CLOCK A BUFFER REG. 

;CLOCK A INTERRUPT VECTOR. 

JCLOCK INTERRUPT VECTOR. 



268 
269 

m 
\i 
m 

276 
2V 



89 

=90 

m 

293 



600242* 000000 

Witt'- 888888 

000250* 000000 
000252* 000000 

88oll1* 012767 000007 177636 

8883ft: m;t; mm mm 
mm- am wm \m\ 



000312- 016700 
000316* 062700 
000122* 010"" 



177712 
000004 



000362* 
000370* 



012767 
016777 
017767 



177510 
177622 



RATEP: 

off: 

rana: 

ranb: 

aiflg: 

try: 

START: 



6 

177666 
177660 



000322* 010067 177706 

000342* 016767 177666 
000350* 062767 000002 



000356' 005777 177642 



177514 
177626 
177476 



• WORD 
.WORD 
.WORD 
. WORD 
. WORD 




MOV 
MOV 

MOV 
ADD 

MOV 
ADD 
MOV 
MOV 
ADD 
MOV 
ADD 



;PCINTS TO CURRENT RATE 
;0FFSET TO.TAKE US TO RATE ROUTINE 



/RANDOM NUMBER. 
5 ;R ANDQM NUMBER. 

JFLAG TO SHOW THAT CLOCK A HAS INTERRRUPTED. 

. ****************************************** 



#7,INTR 

ADDR, ASR 
VECTOR, AVECT 

ASR# ABR 
#2,ABR 

AVECT, RO 

#4/R0 

R0,BVECT 

AVECT, AVECT2 

#2,AVECT2 

BVECT,BVECT2 

#2,BVECT2 



;7 interrupts/ iter at ion 

;get base addr. 

;get base vector addr. 

;n0w we're gonna fix 

;all clock addresses based on asr. 

;ngw fix vector addresses 



♦LOGIC TEST ttl 
♦SPECIFIED ADDR 



BE SURE A CLOCK EXISTS AT THE 
-sftufit-u auuk. IF NO CLOCK, THEN A 
♦DEC/X11 SYS ERROR WILL OCCUR. 

ST @ASR ;ADDRESS THE CLOCK. IF SYS ERROR 

;OCCURS, THEN CLOCK DID NOT 
J RETURN SLAVE-SYN WHEN 
; ADDRESSED . 

* 

♦LOGIC TEST #2. MAKE SURE CLOCK CSR BITS 
♦14,11,6,5/2/ AND CAN BE SET + CLEARED. 



MOV 
MOV 
MOV 



#044125, ASTAT 
ASTAT, gASR 
@ASR,ACSR 



/GENERATE + RECORD PATTERN TO BE USED. 
;SET THEM IN CSR OF CLOCK A. 
/READ THEM BACK 
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000404- 
000412- 
000414' 
000420- 
000424- 
000424- 
000432- 



mm 

104407 
104407 

016767 
012767 



177474 177470 



0000 
0000 



177574 177446 
000025 177446 



000440* 104405 000000' 000000 




mm 177422 



qoo- 

000* 



mm 177374 

000025 177374 
000512* 104405 000000' 000000 



3$: 



CMP ASTAT, ACSR ;DID THEY ALL SET? 

BEQ 2$ ;YES - GO TO NEXT TEST. 

EGIN /TEMPORARY RETURN TO MONITOR.... 

/THEN CONTINUE AT NEXT INSTRUCTION. 

;PECORD CSR'S ADDR 
;BIT STUCK 
' v * " • ******** 



BREAKS, BEGIN 
K$, BEGIN 

ASR,CSRA 

#25,ERRTYP >n 

^~«»****************»****4»,«„„„, XKKKKKKXir 

HRDERS, BEGIN, NULL J ;PATTERN 044125 FAILED 

• **************************************************** 



MOV 
MOV 

******: 



******************** 



********** 



CLR 

MOV 

BEQ 

BREAK 

BREAK 

CLR 

MOV 

MOV 

• **** „ „ 

HRDERS, 
• ****** 



@ASR 

GASR, ACSR 
LOG3 
BEGIN 
BEGIN 
ASTAT 
ASR,CSRA 
#25,ERRTYP 

***********4 



/TRY CLEARING THE 
/READ IT BACK. 
JIF ZERO CSR GOOD. 
/TEMPORARY RETURN TO M 
/THEN CONTINUE AT NEXT 
?EXPECT ZERO CSR. 
;RECORD CSR'S ADDR 
;BIT STUCK 
*********************** 

******** 



QNIT 
INS 



OR ... . 

TRUCTIO 



******* 
******* 



******* 
******* 



;*LOGIC TEST #3. MAKE SURE CLOCK CSR BITS 
;*13,5,3, AND 1 CAN BE SET + CLEARED. 



000520' 

000526* 
000534* 
000542' 

888115- 

000556' 1U44U7 
000562" 

«««?«-• mm 



012767 
016777 
017767 
026767 

loiJJf 



020052 
177352 
177464 



000000* 

oooooo- 

177436 
000025 



177356 
177470 
177340 
177332 



177310 
177310 



33 000576* 104405 000000' 000000 



000604* 
000610' 
000616- 
000620- 
000624- 
000630- 
000634' 
000642* 



005077 
017767 
001417 
104407 
104407 
005067 
016767 
012767 



177414 
177410 

000000' 

000000' 

177250 

177364 

000025 



177236 
177236 



2$: 



3$: 



000650' 104405 000000' 000000 



MOV 
MOV 
MOV 
CMP 
BEQ 

BREAKS 



#020052, ASTAT 
ASTAT, gASR 
"ASR, AC"" 



flASR/ACSR 

astat, acsr 
beIin 



BREAKS, BEGIN 



jgenerate + record pattern to re used. 
;set them in csr of clock a. 
/read them back 
;did they all set? 
;yes - GO TO next test. 

;TEMPOR ARY RETURN TO MONITOR.... 
;THEN CONTINUE AT NEXT INSTRUCTION. 

;RECORD CSR'S ADDR. 



^SSSS^PSIMyLk. ;;csr pattern 020052 failed 
.***************** ************************** ******* 



************* 



************* 



CLR 

MOV 

BEQ 

BREAK 

BREAK 

CLR 

MOV 

MOV ft 

HRDEI 



GASR 

gASR, ACSR 

LOG4 
I/BEGIN 
I, BEGIN 

ASTAT 

ASR,CSRA 



/TRY CLEARING THE BITS 
;READ IT BACK. 
>TF ZERO CSR GOOD. 
;TFMPORARY RETURN TO MONITOR. 
JTHEN CONTINUE AT NEXT INSTRU 
;EXPECT ZERO CSR. 
;RECORD CSR'S ADDR. 



#25,ERRTYP ;PIT STUCK 

************************************** 

$, BEGIN, NULL 

***************** 



; ♦LOGIC TEST #4. MAKE SURE CLOCK BUFFER REG 



o 
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;*PATTERN 125252 CAN BE SET ♦ CLEARED. 



2$: 



3$: 



177014 

177014 

000000 



176742 

176742 



IS: 



2$: 



3$: 



MOV 
MOV 
MOV 
CMP 

BEQ 2$ 
BREAKS, BEGIN 
BREAKS/BEGIN 



ft 125252, ASTAT 
IstAf jrgABR 
"ABR, ACSR 
STAT, ACSR 



^GENERATE ♦ RECORD PATTERN TO BE USED. 
;SET THEM IN BUFFER REG OF CLOCK. 
;READ THEM BACK 
;DID THEY ALL SET? 
;YES - GO TO NEXT TEST. 
^TEMPORARY RETURN TO MONITOR.... 
JTHEN CONTINUE AT NEXT INSTRUCTION. 



ABR,CSRA 
*25,ERRTYP 



*************** 



;bit STUCK 



MOV 

MOV 9£o t i 

„ 

HRDERS, BEGIN, NULL BUFFER REG PATTERN 125252 FAIL 

** ft*** ************ ****** 



********** 



;*****************« 



** ****** 

ED 



CLR @ABR 
MOV §ABR, ACSR 

BEQ LOG5 
BREAKS, BEGIN 
BREAKS, BEGIN 
CLR ASTAT 
MOV ABR,CSRA 
MOV #25,ERRTYP 
. ****************** 

HRDERS, BEGIN, NULL BUFFER REG FAILED TO CLEAR 

« ***********&***********&%**************************** 



;try clearing the bits 
;read it back. 
;if zero buffer good. 

;temporary return to monitor 

;then continue at next instruction. 
;expect zero buffer. 

JRECQRD ADDR. OF BUFFER REG. 
;bit STUCK 

********************************************* 



********** 



♦LOGIC TEST #5. MAKE SURE CLOCK BUFFER REG 
♦PATTERN 052525 CAN BE SET + CLEARED. 



MOV 
MOV 
MOV 
CMP 

BEQ 



#052525* ASTAT 

Istat,@abr 

0ABR»ICSR 
ASTAT, ACSR 



BREAKS, BEGIN 
BREAKS, BEGIN 



GENERATE ♦ RECORD PATTERN TO RE USED. 
;SET THEM IN BUFFER OF CLOCK A. 
;READ THEM BACK 
;DID THEY ALL SET? 
;YES - GO TO NEXT TEST. 
TEMPORARY RETURN TO MONITOR.... 
;then continue at next INSTRUCTION. 



MOV ABR,CSRA >RECORD BUFFER REG ADDR. 

MOV #25,ERRTYP ;BIT STUCK 

• a**********************!;******************************* ******** 
HRDERS, BEGIN, NULL ;;BUFF REG PATTERN 052525 FAILED 

;***********»************&************************************** 



CLR @ABR 
MOV §ABR, ACSR 

BEQ RESTRT 
BREAKS, BEGIN 
BREAKS, BEGIN 
CLR ASTAT 
MOV ABR,CSRA 
MOV #25,ERRTYP 



;TRY CLEARING THE BITS 

/READ IT BACK. 

;IF ZERO BUFFER GOOD. 

/TEMPORARY RETURN TO MONITOR.... 

/THEN CONTINUE AT NEXT INSTRUCTION. 

;EXPECT ZERO BUFFER. 

JRECORD BUFFER REG A ADDR. 

;BIT STUCK 
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•** ********************* ** ************ 



001144 s 104405 000000* 000000 




012767 125252 

0112§2 000100 1771 

mm mm- m 

106167 177032 



177064 

"-"052 
034 
030 



100005 
005067 

012767 

mm 

001361 



177026 
000001 



177016 



1$: 



005067 177004 
016701 176772 
000171 001254' 



001254' 000001 

001256" 001332' 

001260" 001356' 

001262" 001402' 

001164* 001426* 

001266' 001452' 

"ll70" 001476" 

1272" 001602* 



111 



446 
447 
448 
449 
450 
451 

111 

454 
455 
456 
457 

m 

460 

461 



********************** 



HRDERS, BEGIN, NULL ; ; BUFFER REG FAILED TO CLEAR 

.* **************** 



MOV 

MOV 

MOV 

MOVB 

ROLB 

BPL 
CLR 
MOV 
ADD 
BIT 
BNE 

CLR 
MOV 
JMP 



274' 000001 

276' 036260 

m- mm 

304' 176030 

306' 177634 

310' 000000 

312' 177704 



#125252, RANA 

f 8 IT6,RATEP 

f INSERV,gAVECT 

BRl,gAVECT2 

RATE? 

oIf 

#1,RATEP 




********* 

; PRESET REANDOM NUMBER GENERATOR 

;FIRST PASS THRU LOOP, OFFSET=0, RATES WILL=1. 

;SET UP CLOCK A'S INTER. VECTOR. 

;SET PRIORITY ON CLOCK A'S TNTP. 

;GET NEXT RATE. 

>IF NOT END THEN CONTINUE. 
;CLEAR THE OFFSET 
;LOOK AT FIRST RATE 

;IS THIS RATE INHIBITED? 

/CLR FLAG INDICATING CLOCK A HAS INTERRUPTED. 
;PICK UP OFFSET 

;GO SET THE RATE + START THE CLOCK. 



;THE FOLLOWING (L1STP) ARE POINTERS TO VARIOUS RATE 
JROUTINES. THEY ARE USED BY "LOOP". "LOOP" GENERATES 
; AN OFFSET OF A RATE WE WISH TO EXERCISE. THE OFFSET 
;IS STORED IN Rl. WE INDEX "LIST?" BY Rl (JMP gLISTP(Pl)) 
;TO GET THE ADDRESS OF THE RATE ROUTINE TO EXERCISE. 



WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 



JPOINTER TO 1MHZ ROUTINE 

/POTNTER TO 100KHZ ROUTINE 

;POINTER TO 10KHZ ROUTINE 

;POINTER TO 1KHZ ROUTINE 

/POINTER TO 100HZ ROUTINE 

/POINTER TO RANDOM ROUTINE 

/POINTER TO LINE FREQ. ROUTINE 



THE FOLLOWING ( RATE AL ) ARE THE PRESET VALUES THAT THE 
VARIOUS RATE ROUTINES NEED. THEY ARE LOADED INTO 
CLOCK A'S PRESET BUFFER. "RATEAL" IS INDEXED BY 
AN OFFSET IN Rl BY THE RATE ROUTINES TO GET THE 
PRESET VALUE 



WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 
WORD 



-50000. 
-50000. 

-10000. 
-1000. 

-100. 


-60» 



/OFFSET ZERO, NO RATE. 
;VALUE FOR 1MHZ PRESET. 

/PRESET VALUE FOR 100 KHZ 

/PRESET VALUE FOR 10 KHZ 

; P RESET VALUE FOR 1 KHZ 

; P RESET VALUE FOR 100 HZ 

/PRESET VALUE FOR RANDOM 

JPRESF.T VALUE FOR LINE FREQ. 
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if: 0001 



mm- mwi 



016177 
016177 



176666 

001274' 176662 
001314' 176652 



001352* 104400 000000* 



THE FOLLOWING (RSAL) IS USED BY THE RANDOM 

RATE ROUTINE (RATES). THEY ARE THE VALUES NEEDED 

TO BE PUT INTO THE CLOCK'S CSR FOR A PARTICULAR I 





113 

iil 

m 



;OFFSET ZERO/NC RATE. 
U MHZ, GO., MODE 1 
;100 KHZ/ GO., MODE 1 
;10 KHZ, GO. 
;1 KHZ, GO. 
;1C0 HZ, GO. 
;L INE FREQ. 



.WORD 
.WORD 
.WORD 
.WORD 
. WORD 
. WORD 
■ WORD 

;* 

;*THIS ROUTINE PRESETS CLOCK A FOR 

;*1 MHZ RATE CLOCK A INTRS IN 1/20 SEC, 25 TIMES. 
>* 



CLR 
MOV 
MOV 



gASR ;CLEAR CLOCK A. 
RATEAL(R1),»ABR ; PRESET COUNT IN CLOCK A. 
RSAL(R1),0ASR — - 



EXITS, BEGIN 



; START CLOCK A. 
;N0W WAIT FOR INTERRUPT. 

;EXIT TO MONITOR. MODULE WAIT FOR INTER R UP 



;*THIS ROUTINE PRESETS CLOCK A FOR 

;*100 KHZ RATE CLOCK A INTRS IN .5 SEC. , TWICE. 



1356* 005077 176642 

M- mm mm- nm 



001376' 104400 000000* 



CLR 
MOV 

MOV 



gASR 

RATEAL(Rl) 

RSAL(R1),§ 



EXITS, BEGIN 



;CLEAR CLOCK A. 
gABR /PRESET COUNT IN CLOCK A. 
SR JSTART CLOCK A. 

;ncw wait for interrupt. 

;exit to monitor. module wait for interrupt. 



;*THIS ROUTINE PRESETS CLOCK A FOR 

>*10 KHZ RATE CLOCK A INTRS IN 1.0 SFC. 



Iil8l- 016??7 Joi274* 176612 
01414* 016177 001314' 176602 



Oi 

001 

001422' 104400 000000' 



CLR gASR /CLEAR CLOCK A. 

MOV RATEAL( Rl ) # @ABR ?PRESET COUNT IN CLOCK A. 

MOV RSAL(R1),@ASR ;START CLOCK A. 

;N0W WAIT FOR INTERRUPT. 
EXITS, BEGIN ;EXIT TO MONITOR. MODULE WAIT FOR INTERRUPT. 

*THIS ROUTINE PRESETS CLOCK FOR 

*1 KHZ RATE CLOCK A INTRS IN 1.0 SEC. 
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III 
IP 

536 
531 



540 

541 



545 

546 
547 
548 
549 
550 
551 
552 
553 
5§4 
555 
556 
557 
558 
559 
560 

III 

564 
565 

Iff 

568 
i 



m 

014 



001432 
0014- 



' 005077 

: mm 



MM: 

001464* 



001502* 
001510* 



001516- 005767 
001522' 001003 
001524* 062767 



001532' 
001536' 

001540* 
001546' 

001546' 
001552' 
001556' 

mm- 



001003 
062767 



176572 
001274* 
001314' 



52 . 

525 001446* 104400 000000* 

ill 

529 



mm 

016177 
001472' 104400 



mm- 

001314' 

000000" 



001476* 004767 000224 



mm 

176522 
000002 
176510 

000002 

176452 
176466 

yflfS* 

001314' 



001576* 104400 000000' 



001602' 005077 176416 
001606' 016177 001274' 



176566 
176556 



176542 

176532 



176512 
176500 

176436 
176426 



4$: 
5$: 



CLR 
MOV 
MOV 



/CLEAR CLOCK A. 
RAT£AL(R1),@ABR ;PRESET COUNT IN CLUCK A. 
) ,@ASR ■ 



PSAL(Rl), 



EXITS, BEGIN 



; START CLOCK A. 
;NOW WAIT FOR INTERRUPT. 

/EXIT TO MONITOR. 



MODULE WAIT FOR INTERRUPT. 



*TH1S ROUTINE PRESETS CLOCK FOR 

*100 HZ RATE CLOCK A INTRS IN 1.0 SEC. 



CLR 
MOV 
MOV 



gASR /CLEAR CLOCK A. 
RATEAL(Rl) *@ABR /PRESET COUNT IN CLOCK 
RSAL(Rl),gASR ~~' * 



EXITS, BEGIN 



. START CLOCK ... 
;N0W WAIT FOR INTERRUPT. 

;EXIT TO MONITOR. MODULE WAIT FOR INTERRUPT. 



;*THI 

;*ran 



S ROUTINE PRESETS CLOCK FOR 
DOM RATES 



BIC 
BIC 

/NUMB 

TST 
BNE 
ADD 

TST 
BNE 
ADD 



CLR 
MOV 
MOV 
MOV 
MOV 



PC, RANDOM 

§177771, RANA 
8177771, RANB 

ERS MUST BE 2, 4, 
RANA 
4S 

#2, RANA 

RANB 
5$ 

#2, RANB 



gASR 
RAN A,R1 
Rl,OFF 



/get 2 random numbers. 

;hake number < 10. 
;make 2nd number < 10. 

OR 6 

;IS NUMBER ZERO? 
;NO-GO AHEAD. 
;MAKE IT NON-ZERO 

;IS NUMBER ZERO? 
;NO GO AHEAD. 
/MAKE IT NON-ZERO. 



;CLE AR CLOCK A 
; RECORD THE OFFSET. 



RATEAL(R1 )#@ABR /PRESET CLOCK A. 
P.SAL(R1),§ASR /START CLOCK A. 



EXITS, BEGIN 



;EXIT TO MONITOR. MODULE WAIT FOR INTERRUPT. 



;*THIS ROUTINE PRESETS CLCCK FOR 

;*LINE FREQ RATE CLOCK A INTRS. IN 1.0 SEC 



CLR 
MOV 



gASR /CLEAR CLOCK A. 

RATEAL(R1 ),@ABR /PRESET COUNT IN A. 



mm DEC/Xll SYSTEM EXERCISER 
XR«B0»P11 12-0CT-78 12107 



574 

I?? 

580 
581 
582 
583 
584 
585 

P 
Hi 

m 

592 

111 

595 
596 
§97 



603 
604 
605 
606 
607 
608 

ill 

m 

616 

617 
618 
619 
620 
621 



001614' 

001622* 



001626* 
001632" 



til- 

646* 
650* 
656* 
660* 
662" 



016177 
104400 



005267 
042777 



L702" 
001704" 
001704" 
001710* 

mm- 

001722" 



001726" 
001734* 



01752" 000207 



066767 
005567 

000201 



001314 
000000 



MODULE 
176402 
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026727 

mm 
mm 

026727 

mm 

001401 
000002 



005077 

000004 



104413 
000167 



176416 
000200 



176376 
176374 

176354 

176352 



176314 
000000' 



000000' 
177254 



176312 
176304 

mm 



000002 
000024 

000004 
000002 



176312 
176276 



MOV RSAL(R1),@ASR 

EXIT$, BEGIN 



INSERV: 

2S 5 



3$: 



SEQ 0013 

/start clock a. 

;exit to monitor, module wait for interrupt. 



;* INTERRUPT SERVICE ROUTINE 
;*F0R CLOCK. 



INC 
BIC 



CMP 
BNE 
CMP 
BEG 
RTI 
CMP 
BNE 
CMP 
BEQ 
RTI 



AIFLG 
#200,@ASR 



OFF,#2 

AIFLG, #20. 

4$ 

OFF, #4 

a!flG,#2 

4$ 



;INDICATE CLOCK A HAS INTERRUPTED 
; CLEAR 0VFRFL0W FLAG. 



; ARE WE RUNNING 1MHZ RATE? 
;IF NOT ( 3$ 
Jl MHZ, 1 SEC. UP? 

;yes - stop 



CLR gASR 

^irq$7begIm,ine 



;yes 

;no, allow another count. 

;100 KHZ RATE? 

;no - 4$ 

;YES, COUNTED TWICE? 
?YES - 4$. 

;N0 - COUNT ONE MORE TIME. 



;ST0P CLOCK A. 

; QuIuI~UP TO CONT INUE~AT~INE~AND~RT I~ 



ENDIT$, BEGIN 



;SIGNAL END OF ITERATION. 
;MCNITOR SHALL TEST END OF PASS 
;G0 TO LOOP IF NOT ENDPASS TIME 



ADD 
ADC 
ADD 
ADC 
RTS 



♦THIS SUBROUTINE GENERATES 

*TWO RANDOM NUMBERS 

* 

♦CALL = JSR PC, RANDOM 
* ' 

♦RETURNS WITH NUMBERS IN RAND A AND RANDB 



RANA,R ANB 
RAN A 

RANB,RAN A 

RANB 
PC 



KMEB DEC/Xll SYSTEM EXERCISER MODULE 
XKKEB0.P11 12-OCT-78 12S07 



&BR 

iCSR 

mm 

4DDR22™ 

iiFLG 

ASB 



AST&T 

AVECY 
&VECT2 

BEGIM 



000226R 

ooilo?i 

001000 

000250R 

000106R 

000224R 



mmi 

000110R 

OOOO0OR 




242# 

399 

220* 

186# 
238f 
255| 
224f 
2411 
336 s 
558* 

%¥ 

225 
183 

118 

238 

111 

238: 

238 

238 

ill 

238 

238 
238 
238 
238 
238 
238 
238 
238 
389 
188 
189 
238 
247 
248 
238 
208 
218 
238 
238 
190 
238 

m 

238; 
238 
238 
203 

ffl 



264* 
404 
293* 
261 

423* 

261* 

337 

562* 

Si* 

296 

ffl 
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265* 
483* 
294 



583* 

264 
342 
572* 

BI. 

297 
364 
525 



296 
390 

413 



269* 
272* 



300* 
486 



297 
401 



272 
273* 



312* 
499 



354* 
496* 
306* 


355 

509* 

324* 


361 

522* 
325 


367* 
535* 
337* 


368 
561* 
355* 


373 

573* 

356 


385* 
368* 


386 
386* 


392 
387 


398* 
399* 


589 


594 


















281 

482* 

574* 

294 

403* 

270 

413* 


292* 
484* 
584* 
310* 


293 
495* 
600* 
322* 


299 
497* 

323 


305* 
508* 

325 


306 
510* 

341* 


311 

521* 

353* 


323* 
523* 

354 


324 
534* 

356 


330 
536* 

372* 


412* 


















302 
370 
538 


308 
371 
564 


309 
376 
576 


314 
389 
602 


327 
390 
606 


328 
395 


333 
401 


339 
402 


340 
407 


345 
486 



308 
402 



330* 342* 



331* 
512 



343* 
525 



362* 

538 



374* 
564 



393* 
576 
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RATEAL 

RATEP 

RATEO 

RATE1 

RATE* 

RATES 

RATE4 

RATE5 

RATE6 



002 

MP" 

000054R 

001332R 

mm 
mm 

001476R 
001602R 



mt 



605# 

583# 
259* 
435# 



322* 

lilt 



236# 



410* 
546* 
619# 



483 

411* 

481$ 

494f 

507f 



) 



in. 
m 



333 
424 
193 
225 



lit* 



211 

228 



376 
592 

m 



213 
238# 



407 
214 



545* 
553 



496 
414* 



549 

555* 



509 
418* 



551* 
619* 



522 
420 



559 
621 



619 

622* 



KUEB DEC/Xll SYSTEM EXERCISER MODULE 
XKWEB0.P11 12-OCT-78 12:07 

400 
484 



231 

420 

25 8# 




ml 

206§ 
238| 

m 

221# 



185# 
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410# 

497 510 523 536 562 5 



ABS. 000000 

001754 



000 
001 



ERRORS DETECTED: 

DEFAULT GLOBALS GENERATED: 

XKWEB0 / XKWEB0/SOL/CRF:SYM=DDXCOM,XKWEB0 
RUN-TIME: 1 2 .3 SECONDS 
RUN-TIME RATIO*. 31/3 = 7.7 
CORE USED: 7K (13 PAGES) 



) 



